home *** CD-ROM | disk | FTP | other *** search
/ Games of Daze / Infomagic - Games of Daze (Summer 1995) (Disc 1 of 2).iso / djgpp / contrib / pdcurs22 / src / private / pdcscrn.c < prev    next >
Encoding:
C/C++ Source or Header  |  1995-01-26  |  7.7 KB  |  245 lines
  1. /*
  2. ***************************************************************************
  3. * This file comprises part of PDCurses. PDCurses is Public Domain software.
  4. * You may use this code for whatever purposes you desire. This software
  5. * is provided AS IS with NO WARRANTY whatsoever.
  6. * Should this software be used in another application, an acknowledgement
  7. * that PDCurses code is used would be appreciated, but is not mandatory.
  8. *
  9. * Any changes which you make to this software which may improve or enhance
  10. * it, should be forwarded to the current maintainer for the benefit of 
  11. * other users.
  12. *
  13. * The only restriction placed on this code is that no distribution of
  14. * modified PDCurses code be made under the PDCurses name, by anyone
  15. * other than the current maintainer.
  16. * 
  17. * See the file maintain.er for details of the current maintainer.
  18. ***************************************************************************
  19. */
  20. #define    CURSES_LIBRARY    1
  21. #include <curses.h>
  22. #ifdef UNIX
  23. #include <defs.h>
  24. #include <term.h>
  25. #undef lines
  26. #endif
  27.  
  28. #ifdef PDCDEBUG
  29. char *rcsid_PDCscrn  = "$Id$";
  30. #endif
  31.  
  32. /*man-start*********************************************************************
  33.  
  34.   PDC_scr_close()    - Internal low-level binding to close the physical screen
  35.  
  36.   PDCurses Description:
  37.      This function provides a low-level binding for the Flexos
  38.      platform which must close the screen before writing to it.
  39.      This is a nop for the DOS platform.
  40.  
  41.      This function is provided in order to reset the FlexOS 16 bit
  42.      character set for input rather than the limited input
  43.      character set associated with the VT52.
  44.  
  45.   PDCurses Return Value:
  46.      This function returns OK on success, otherwise an ERR is returned.
  47.  
  48.   PDCurses Errors:
  49.      The DOS platform will never fail.  The Flexos platform may fail
  50.      depending on the ability to close the current virtual console in
  51.      8 (as opposed to 16) bit mode.
  52.  
  53.   Portability:
  54.      PDCurses    int    PDC_scr_close( void );
  55.  
  56. **man-end**********************************************************************/
  57.  
  58. int    PDC_scr_close(void)
  59. {
  60. #ifdef PDCDEBUG
  61.     if (trace_on) PDC_debug("PDC_scr_close() - called\n");
  62. #endif
  63.  
  64. #ifdef    FLEXOS
  65.     _flexos_8bitmode();
  66.     vir.vc_kbmode = kbmode;
  67.     vir.vc_smode = smode;
  68.     vir.vc_mode = cmode;
  69.     retcode = s_set(T_VIRCON, 1L, (char *) &vir, (long) sizeof(vir));
  70.     if  (retcode < 0L)
  71.         return( ERR );
  72.     return( OK );
  73. #endif
  74.  
  75.     return( OK );
  76. }
  77.  
  78. /*man-start*********************************************************************
  79.  
  80.   PDC_scrn_modes_equal()    - Decide if two screen modes are equal
  81.  
  82.   PDCurses Description:
  83.      Mainly required for OS/2. It decides if two screen modes
  84.         (VIOMODEINFO structure) are equal. Under DOS it just compares
  85.         two integers
  86.  
  87.   PDCurses Return Value:
  88.      This function returns TRUE if equal else FALSe.
  89.  
  90.   PDCurses Errors:
  91.      No errors are defined for this function.
  92.  
  93.   Portability:
  94.      PDCurses    int PDC_scrn_modes_equal( int mode1, int mode2 );
  95.      OS2 PDCurses    int PDC_scrn_modes_equal( VIOMODEINFO mode1, VIOMODEINFO mode2 );
  96.  
  97. **man-end**********************************************************************/
  98.  
  99. #if defined( OS2 ) && !defined( EMXVIDEO )
  100. bool    PDC_scrn_modes_equal(VIOMODEINFO mode1, VIOMODEINFO mode2)
  101. #else
  102. bool    PDC_scrn_modes_equal(int mode1, int mode2)
  103. #endif
  104. {
  105. #ifdef PDCDEBUG
  106.     if (trace_on) PDC_debug("PDC_scrn_modes_equal() - called\n");
  107. #endif
  108.  
  109. #if defined( OS2 ) && !defined( EMXVIDEO )
  110.     return (   (mode1.cb == mode2.cb) && (mode1.fbType == mode2.fbType)
  111.             && (mode1.color == mode2.color) && (mode1.col == mode2.col)
  112.             && (mode1.row == mode2.row) && (mode1.hres == mode2.vres)
  113.             && (mode1.vres == mode2.vres) );
  114. #else
  115.     return (mode1 == mode2);
  116. #endif
  117. }
  118.  
  119. /*man-start*********************************************************************
  120.  
  121.   PDC_scr_open()    - Internal low-level binding to open the physical screen
  122.  
  123.   PDCurses Description:
  124.      This function provides a low-level binding for the Flexos
  125.      platform which must open the screen before writing to it.
  126.  
  127.      This function is provided in order to access the FlexOS 16 bit
  128.      character set for input rather than the limited input
  129.      character set associated with the VT52.
  130.  
  131.   PDCurses Return Value:
  132.      This function returns OK on success, otherwise an ERR is returned.
  133.  
  134.   PDCurses Errors:
  135.      The DOS platform will never fail.  The Flexos platform may fail
  136.      depending on the ability to open the current virtual console in
  137.      8 (as opposed to 16) bit mode.
  138.  
  139.   Portability:
  140.      PDCurses    int    PDC_scr_open( SCREEN* internal, bool echo );
  141.  
  142. **man-end**********************************************************************/
  143.  
  144. int    PDC_scr_open(SCREEN *internal, bool echo)
  145. {
  146.  
  147. #ifdef PDCDEBUG
  148.     if (trace_on) PDC_debug("PDC_scr_open() - called\n");
  149. #endif
  150.  
  151. #ifdef    FLEXOS
  152.     retcode = s_get(T_VIRCON, 0L, (char *) &vir, (long) sizeof(vir));
  153.     if (retcode < 0L)
  154.         return( ERR );
  155.  
  156.     kbmode = vir.vc_kbmode;
  157.     cmode = vir.vc_mode;
  158.     vir.vc_mode = 0;
  159.  
  160.     if (!echo)    vir.vc_kbmode |= VCKM_NECHO;
  161.     else        vir.vc_kbmode &= ~VCKM_NECHO;
  162.  
  163.     smode = vir.vc_smode;
  164.     retcode = s_set(T_VIRCON, 0L, (char *) &vir, (long) sizeof(vir));
  165.     if  (retcode < 0L)
  166.         return( ERR );
  167.  
  168.     if (vir.vc_type & 0x03)    internal->mono = TRUE;
  169.     else            internal->mono = FALSE;
  170.  
  171.     internal->orig_attr = vir.vc_flcolor | vir.vc_blcolor;
  172.     _flexos_16bitmode();
  173. #endif
  174.  
  175. #ifdef    DOS
  176.     internal->orig_attr     = 0;
  177.     internal->orig_emulation = getdosmembyte (0x487);
  178. #endif
  179.  
  180. #ifdef    OS2
  181.     internal->orig_attr     = 0;
  182.     internal->orig_emulation = 0;
  183. #endif
  184.  
  185. #ifdef UNIX
  186.     PDC_get_cursor_pos(&internal->cursrow, &internal->curscol);
  187.     internal->autocr    = FALSE;        /* lf -> crlf by default      */
  188.     internal->raw_out    = FALSE;    /* tty I/O modes          */
  189.     internal->raw_inp    = FALSE;    /* tty I/O modes          */
  190.     internal->cbreak    = FALSE;
  191.     internal->echo        = echo;
  192.     internal->refrbrk    = FALSE;    /* no premature end of refresh*/
  193.     internal->visible_cursor= TRUE;        /* Assume that it is visible  */
  194.     internal->cursor    = 0;
  195.     internal->font        = 0;
  196.     internal->lines        = PDC_get_rows();
  197.     internal->cols        = PDC_get_columns();
  198.     internal->audible    = TRUE;
  199.     internal->direct_video    = FALSE;        /* Assume that we can          */
  200.     internal->adapter    = PDC_query_adapter_type();
  201.     _CUR_TERM.prog_mode.c_iflag &= ~(ICRNL);
  202.     _CUR_TERM.prog_mode.c_oflag &= ~(ONLCR|OPOST);
  203.     _CUR_TERM.prog_mode.c_lflag &= ~(ICANON|ECHO);
  204.     _CUR_TERM.prog_mode.c_cc[VMIN] = 1;
  205.     ioctl(_CUR_TERM.fd, TCSETA, &_CUR_TERM.prog_mode);
  206.     return(OK);
  207. #endif
  208.  
  209. #if defined(XCURSES)
  210.     internal->cursrow = internal->curscol = 0;
  211.     internal->direct_video    = FALSE;        /* Assume that we can't          */
  212. #else
  213.     PDC_get_cursor_pos(&internal->cursrow, &internal->curscol);
  214.     internal->direct_video    = TRUE;        /* Assume that we can          */
  215. #endif
  216.  
  217.     internal->autocr    = TRUE;        /* lf -> crlf by default      */
  218.     internal->raw_out    = FALSE;    /* tty I/O modes          */
  219.     internal->raw_inp    = FALSE;    /* tty I/O modes          */
  220.     internal->cbreak    = TRUE;
  221.     internal->echo        = echo;
  222. /* under System V Curses, typeahead checking is enabled by default */
  223.     internal->refrbrk    = TRUE;    /* allow premature end of refresh*/
  224. #if !defined(OS2) && !defined(XCURSES)
  225.     internal->video_seg    = 0xb000;    /* Base screen segment addr   */
  226.     internal->video_ofs    = 0x0;        /* Base screen segment ofs    */
  227. #endif
  228.     internal->video_page    = 0;        /* Current Video Page          */
  229.     internal->visible_cursor= TRUE;        /* Assume that it is visible  */
  230.     internal->cursor    = PDC_get_cursor_mode();
  231. #ifdef EMXVIDEO
  232.     internal->tahead    = -1;
  233. #endif
  234.     internal->adapter    = PDC_query_adapter_type();
  235.     internal->font        = PDC_get_font();
  236. #if !defined(EMXVIDEO) && !defined(XCURSES)
  237.     internal->scrnmode    = PDC_get_scrn_mode();
  238. #endif
  239.     internal->lines        = PDC_get_rows();
  240.     internal->cols        = PDC_get_columns();
  241.     internal->audible    = TRUE;
  242.     internal->visibility    = 1;
  243.     return( OK );
  244. }
  245.